home *** CD-ROM | disk | FTP | other *** search
/ MacAddict 108 / MacAddict108.iso / Software / Internet & Communication / WordPress 1.5.1.dmg / wordpress / wp-admin / update-links.php < prev    next >
Encoding:
PHP Script  |  2005-03-29  |  1.4 KB  |  44 lines
  1. <?php
  2. require_once( dirname( dirname(__FILE__) ) . '/wp-config.php');
  3. require_once( ABSPATH . 'wp-includes/class-snoopy.php');
  4.  
  5. if ( !get_option('use_linksupdate') )
  6.     die('Feature disabled.');
  7.  
  8. $link_uris = $wpdb->get_col("SELECT link_url FROM $wpdb->links");
  9.  
  10. if ( !$link_uris )
  11.     die('No links');
  12.  
  13. $link_uris = urlencode( join( $link_uris, "\n" ) );
  14.  
  15. $query_string = "uris=$link_uris";
  16.  
  17. $http_request  = "POST /updated-batch/ HTTP/1.0\r\n";
  18. $http_request .= "Host: api.pingomatic.com\r\n";
  19. $http_request .= 'Content-Type: application/x-www-form-urlencoded; charset='.get_settings('blog_charset')."\r\n";
  20. $http_request .= 'Content-Length: ' . strlen($query_string) . "\r\n";
  21. $http_request .= 'User-Agent: WordPress/' . $wp_version . "\r\n";
  22. $http_request .= "\r\n";
  23. $http_request .= $query_string;
  24.  
  25. $response = '';
  26. if( false !== ( $fs = fsockopen('api.pingomatic.com', 80, $errno, $errstr, 5) ) ) {
  27.     fwrite($fs, $http_request);
  28.     while ( !feof($fs) )
  29.         $response .= fgets($fs, 1160); // One TCP-IP packet
  30.     fclose($fs);
  31.     
  32.     $response = explode("\r\n\r\n", $response, 2);
  33.     $body = trim( $response[1] );
  34.     $body = str_replace(array("\r\n", "\r"), "\n", $body);
  35.     
  36.     $returns = explode("\n", $body);
  37.     
  38.     foreach ($returns as $return) :
  39.         $time = addslashes( substr($return, 0, 19) );
  40.         $uri = addslashes( preg_replace('/(.*?) | (.*?)/', '$2', $return) );
  41.         $wpdb->query("UPDATE $wpdb->links SET link_updated = '$time' WHERE link_url = '$uri'");
  42.     endforeach;
  43. }
  44. ?>